perm filename ACCT.DAT[FOO,LMM] blob sn#061971 filedate 1973-12-07 generic text, type T, neo UTF8
(FILECREATED " 8-SEP-73 12:32:25" ACCTDAT)


  (LISPXPRINT (QUOTE ACCTDATVARS)
              T)
  (RPAQQ ACCTDATVARS ((VARS FORS ACCTS NAMES STANDARDSPLIT)
          (PROP SPLIT * FORS)))
  (RPAQQ FORS (RENT FOOD BILLS CLEANING))
  (RPAQQ ACCTS
         ("August" (STEVE FOOD 10.0 WITH BRUCE)
                   (BRUCE FOOD 27.57 WITH STEVE)
                   (STEVE FOOD 11.33 CO-OP)
                   (STEVE FOOD 7.82 CO-OP)
                   (STEVE FOOD 11.53 EARTH SIGN)
                   (STEVE FOOD 5.26 EARTH SIGN)
                   (STEVE FOOD 16.08 CO-OP)
                   (BRUCE FOOD 1.9 CO-OP)
                   (BRUCE FOOD 2.07 CO-OP)
                   (STEVE FOOD 3.7 KEYS)
                   (LARRY FOOD 7.44 DRAEGER'S)
                   (STEVE FOOD 5.02 EARTH SIGN)
                   (BRUCE FOOD 1.11 ALAMEDA FOOD MARKET)
                   (STEVE FOOD 21.66 CO-OP)
                   (STEVE FOOD 11.95 EARTH SIGN)
                   (HOUSE RENT 425.0 RENT FOR SEPTEMBER)
                   (HOUSE BILLS 30.16 WATER BILL!!!!!!)
                   (HOUSE BILLS 7.63 MA BELL)
                   (HOUSE BILLS 35.83 PG&E)
                   (DANIEL LARRY 126.0 PAID)
                   (HOUSE DANIEL 126.0 PRIOR BALANCE)
                   (HOUSE STEVE -133.33 PRIOR BALANCE)
                   (HOUSE MELANIE 172.64 PRIOR BALANCE)
                   (HOUSE LARRY 165.08 PRIOR BALANCE)
                   (LARRY HOUSE 425.0 PAID RENT WITH MY CHECK RATHER 
                          THAN HOUSE CHECK)
                   (MELANIE CLEANING 60.0)
                   (HOUSE LAURA 40.0 RENT DEPOSIT)))
  (RPAQQ NAMES (LARRY STEVE MELANIE LAURA BRUCE DANIEL HOUSE))
  (RPAQQ STANDARDSPLIT NOBIND)
(DEFLIST(QUOTE(
  (RENT ((LARRY . 67.5)
         (STEVE . 70)
         (MELANIE . 67.5)
         (BRUCE . 65)
         (DANIEL . 65)
         (LAURA . 65)))
  (FOOD ((LARRY . 1)
         (STEVE . 1)
         (BRUCE . 1)
         (MELANIE . 1)))
  (BILLS ((LARRY . 1)
          (STEVE . 1)
          (BRUCE . 1)
          (MELANIE . 1)
          (DANIEL . 1)))
  (CLEANING ((LARRY . 1)
             (MELANIE . 1)
             (STEVE . 1)))
))(QUOTE SPLIT))

STOP